The Art of Making Great Pastries/The Art of Making Great Pastries.iso/glblstar.exe/glblstar.dxr/00003.ls

Text File | 1998-06-16 | 310 b | 15 lines

on enterFrame
  repeat with i = 1 to 50
    if getNthFileNameInFolder("C:\arome\pastries\", i) = "pastry.exe" then
      set ProgramInstalled to 1
    end if
  end repeat
  if ProgramInstalled = 1 then
    set ProgramInstalled to 0
    open("\pastryuj.exe")
    quit()
  else
    play frame "bkg"
  end if
end